﻿Public Class Form5
    Private Sub CopyToolStripButton_Click(sender As Object, e As EventArgs) Handles CopyToolStripButton.Click
        If Not IsNothing(WebBrowser1.Document) Then

            WebBrowser1.Document.ExecCommand("SelectAll", False, Nothing)
            WebBrowser1.Document.ExecCommand("Copy", False, Nothing)
            WebBrowser1.Document.ExecCommand("Unselect", False, Nothing)

            MsgBox("Data copied to clipboard successfully", MsgBoxStyle.Information, "Topic Drill--Down")

        End If
    End Sub
End Class